home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / AMIGA / AMICUS / AMICUS24.ADF / Daisy / daisy.c < prev    next >
C/C++ Source or Header  |  1988-04-16  |  4KB  |  133 lines
  1. Message-ID: #5238.pnet02.amiga/usenet 4436 chars. (2 more)
  2. From: rap@dana.UUCP (Rob Peck)
  3. Newsgroups: comp.sys.amiga
  4. Subject: Re: Simple Example Desired
  5. Date: 16 Oct 87 17:31:07 GMT
  6. Organization: Dana Computer, Inc., Sunnyvale, CA
  7.  
  8. In article <224@shamash.UUCP>, jwabik@shamash.UUCP (Jeff Wabik) writes:
  9. > This has probably been asked before, but, could someone post (or mail) a
  10. > working example using the translator and narrator devices?  I've been 
  11. > scratching my head for a few days here, even examining such goodies as
  12. > speechtoy.c, but with no luck.  My environment is Manx 3.4 ..  
  13. > 
  14. >       -Jeff
  15.  
  16. I created this 99 line program in the hopes that it would be killer
  17. demo material.  It is too short, I believe, for the sources posting
  18. hopefully qualifying as message-only status for all purposes.  This
  19. is about as short and simple as you can get when dealing with the
  20. narrator and translator.  To simplify it further, you could also
  21. delete the creation of rn - the message block that reads the mouths.
  22.  
  23. I wanted to make the narrator sing.  It sorta does it, but the syllables
  24. are too far apart to have anyone say "yes, it really does sing".  Yet
  25. it does provide at least a jumping off point for folks to use
  26. (creation method: 1. open speechtoy.c source, 2. remove anything
  27. not strictly speech-related, 3. compile whats left.)  I was told by
  28. Mark Barton that I'd have to get deep into the Narrator device code
  29. in order to "really" do what I wanted, since it was not designed
  30. to sing in the first place.  You'll find that he was right.
  31.  
  32. The test phrase, by the way, folks said "if you are going to make
  33. it sing, surely you won't want to use 'Daisy, daisy....'"
  34. Well, they were wrong.
  35.  
  36. Hope it helps.                  Rob Peck        ...ihnp4!hplabs!dana!rap
  37.  
  38. --- cut here, might be Manx-compatible (cc +L ...; ln ... c32.lib, at least)
  39.  
  40. #include "exec/types.h"
  41. #include "exec/exec.h"
  42. #include "exec/nodes.h"
  43. #include "exec/lists.h"
  44. #include "exec/memory.h"
  45. #include "exec/interrupts.h"
  46. #include "exec/ports.h"
  47. #include "exec/libraries.h"
  48. #include "exec/io.h"
  49. #include "exec/tasks.h"
  50. #include "exec/execbase.h"
  51. #include "devices/narrator.h"
  52. #include "libraries/translator.h"
  53.  
  54. struct MsgPort *readPort=0;
  55. struct MsgPort *writePort=0;
  56.  
  57. extern struct MsgPort *CreatePort();
  58. extern struct IORequest *CreateExtIO();
  59.                   
  60. struct narrator_rb *wn=0;
  61. struct mouth_rb *rn=0;
  62.                            
  63. struct Library *TranslatorBase =0;
  64.     
  65. UBYTE *sampleInput;
  66. UBYTE outputString[500];
  67. SHORT rtnCode, readError, writeError, error;
  68.      
  69. UBYTE audChanMasks[4] = { 3,5,10,12 };
  70.                                                       
  71. extern struct Library *OpenLibrary();
  72. #define REVISION 1
  73. char *words[ ] = {
  74.                 "da","zee","da","zee","give","me",
  75.                 "your","an","sir","doooo" };
  76. long pitches[] = { 300, 285, 270, 250, 260, 270, 285, 270, 285, 230 };
  77.  
  78. main()
  79. {
  80.   long i;
  81.   TranslatorBase = OpenLibrary("translator.library",REVISION);
  82.   if(TranslatorBase == NULL) exit(20);
  83.  
  84.   writePort = CreatePort(0,0);
  85.   if(writePort == NULL) goto cleanup;
  86.                      
  87.   readPort = CreatePort(0,0);
  88.   if(readPort == NULL) goto cleanup;
  89.  
  90.   wn = (struct narrator_rb *)CreateExtIO(writePort,
  91.         sizeof(struct narrator_rb));
  92.  
  93.   rn = (struct mouth_rb *)CreateExtIO(readPort,
  94.         sizeof(struct mouth_rb));
  95.  
  96.   if(rn == NULL || wn == NULL) goto cleanup;
  97.  
  98.   wn->ch_masks = audChanMasks;
  99.   wn->nm_masks = 1;   /* restrict to one channel */
  100.   wn->message.io_Data    = (APTR)outputString;
  101.   wn->message.io_Length  = strlen(outputString);
  102.   wn->mouths = 0;             /* NO MOUTHS! Wont read em anyhow.*/
  103.   wn->message.io_Command = CMD_WRITE;
  104.  
  105.   error = OpenDevice("narrator.device",0,wn,0);
  106.   if(error != 0) goto cleanup;
  107.  
  108.   for(i=0; i<10; i++)
  109.   {
  110.   sampleinput = words[i];
  111.   rtnCode = Translate(sampleInput, 
  112.   strlen(sampleInput),outputString,500);
  113.                                
  114.   wn->pitch = pitches[i];
  115.   wn->mode  = 1;          /* ROBOTIC */
  116.                                                 
  117.   wn->message.io_Data    = (APTR)outputString;
  118.   wn->message.io_Length  = strlen(outputString);
  119.   wn->message.io_Command = CMD_WRITE;
  120.  
  121.   writeError = DoIO(wn);
  122.   }
  123. cleanup:
  124.   if(wn->message.io_Device) CloseDevice(wn);
  125.   if(wn) DeleteExtIO(wn);
  126.   if(rn) DeleteExtIO(rn);
  127.   if(TranslatorBase) CloseLibrary(TranslatorBase);
  128.   if(readPort) DeletePort(readPort);
  129.   if(writePort) DeletePort(writePort);
  130. }
  131.  
  132.  
  133.